SET QUOTED_IDENTIFIER ON
GO
SET ANSI_NULLS ON
GO

CREATE view [dbo].[TMAUXI_EMPR] AS                      
Select                                   
T1.CO_EMPR , 'C' TI_AUXI_EMPR, T1.CO_CLIE CO_AUXI_EMPR, T1.NO_CLIE NO_AUXI,                                   
T3.DE_DIRE NO_DIRE, T1.NU_RUCS , '' NU_TLFN, '' NU_FAXE, T2.CO_TIPO_CLIE TI_CLIE, T2.DE_TIPO_CLIE DE_TIPO_CLIE,                                  
T3.CO_UBIC_GEOG CO_UBIC_GEOG, '' CO_COND_PAGO, t1.CO_MONE_CRED,                                   
T1.IM_LIMI_CRED, 0 IM_CRED_EXED, '' DE_OBSE, '' ST_RETE, '' ST_BCON, '' ST_SUJE_DETR,                                   
T1.CO_DOCU_SUNA, T1.NU_DOCU_SUNA, T1.TI_PERS_SUNA, T1.NU_RETE_SUNA,                                  
T1.AP_PATE_CLIE AP_PATE_AUXI, T1.AP_MATE_CLIE AP_MATE_AUXI, T1.NO_NATU_0001 NO_NATU_AUX1,                                   
T1.NO_NATU_0002 NO_NATU_AUX2, T1.NO_RAZO_SOCI,                                
T1.CO_ZONA, '' CO_SUBR, '' TI_DOCU_IDEN , '' NU_DOCU_IDEN, TI_SITU, '' ST_PERC, '' NU_CNTA_DETR  ,                      
T1.CO_GRUP_ECON, '' ST_PROV_NOHA, ''TI_CNTA_MNAC, ''NU_CNTA_MNAC, ''TI_CNTA_MEXT, ''NU_CNTA_MEXT , '' TI_NATU_JURI                   
From  OFITESO.DBO.[TMCLIE_TESO]T1        
LEFT OUTER JOIN OFITESO.DBO.[TTTIPO_CLIE] T2        
ON T1.CO_TIPO_CLIE = T2.CO_TIPO_CLIE         
LEFT OUTER JOIN OFITESO.DBO.[TDDIRE_CLIE] T3           
ON T1.CO_EMPR = T3.CO_EMPR                                  
AND T1.CO_CLIE = T3.CO_CLIE                                  
AND T3.TI_DIRE = 'COM'                   
                     
Union All   
  
Select                                   
T1.CO_EMPR , 'R' TI_AUXI_EMPR, T1.CO_CLIE CO_AUXI_EMPR, T1.NO_CLIE NO_AUXI,                                   
T3.DE_DIRE NO_DIRE, T1.NU_RUCS , '' NU_TLFN, '' NU_FAXE, T2.CO_TIPO_CLIE TI_CLIE, T2.DE_TIPO_CLIE DE_TIPO_CLIE,                                  
T3.CO_UBIC_GEOG CO_UBIC_GEOG, '' CO_COND_PAGO, t1.CO_MONE_CRED,                                   
T1.IM_LIMI_CRED, 0 IM_CRED_EXED, '' DE_OBSE, '' ST_RETE, '' ST_BCON, '' ST_SUJE_DETR,                                   
T1.CO_DOCU_SUNA, T1.NU_DOCU_SUNA, T1.TI_PERS_SUNA, T1.NU_RETE_SUNA,                                  
T1.AP_PATE_CLIE AP_PATE_AUXI, T1.AP_MATE_CLIE AP_MATE_AUXI, T1.NO_NATU_0001 NO_NATU_AUX1,                                   
T1.NO_NATU_0002 NO_NATU_AUX2, T1.NO_RAZO_SOCI,                                
T1.CO_ZONA, '' CO_SUBR, '' TI_DOCU_IDEN , '' NU_DOCU_IDEN, TI_SITU, '' ST_PERC, '' NU_CNTA_DETR  ,                      
T1.CO_GRUP_ECON, '' ST_PROV_NOHA, ''TI_CNTA_MNAC, ''NU_CNTA_MNAC, ''TI_CNTA_MEXT, ''NU_CNTA_MEXT , '' TI_NATU_JURI                   
From  OFITESO.DBO.[TMCLIE_TESO]T1        
LEFT OUTER JOIN OFITESO.DBO.[TTTIPO_CLIE] T2        
ON T1.CO_TIPO_CLIE = T2.CO_TIPO_CLIE         
LEFT OUTER JOIN OFITESO.DBO.[TDDIRE_CLIE] T3           
ON T1.CO_EMPR = T3.CO_EMPR                                  
AND T1.CO_CLIE = T3.CO_CLIE                                  
AND T3.TI_DIRE = 'COM'           
                       
Union All                     
                  
/*                                
Select                                   
T1.CO_EMPR , 'C' TI_AUXI_EMPR, T1.CO_CLIE CO_AUXI_EMPR, T1.NO_CLIE NO_AUXI,                                   
'' NO_DIRE, T1.NU_RUCS , '' NU_TLFN, '' NU_FAXE, T2.CO_TIPO_CLIE TI_CLIE, T2.DE_TIPO_CLIE DE_TIPO_CLIE,                                  
'' CO_UBIC_GEOG, '' CO_COND_PAGO, t1.CO_MONE_CRED,                                   
0 IM_LIMI_CRED, 0 IM_CRED_EXED, '' DE_OBSE, '' ST_RETE, '' ST_BCON, '' ST_SUJE_DETR,                                   
T1.CO_DOCU_SUNA, T1.NU_DOCU_SUNA, T1.TI_PERS_SUNA, T1.NU_RETE_SUNA,                                  
T1.AP_PATE_CLIE AP_PATE_AUXI, T1.AP_MATE_CLIE AP_MATE_AUXI, T1.NO_NATU_0001 NO_NATU_AUX1,                                   
T1.NO_NATU_0002 NO_NATU_AUX2, T1.NO_RAZO_SOCI,                                
T1.CO_ZONA, '' CO_SUBR   ,  '' TI_DOCU_IDEN , '' NU_DOCU_IDEN, TI_SITU,  '' ST_PERC, '' NU_CNTA_DETR  ,                      
T1.CO_GRUP_ECON, '' ST_PROV_NOHA, ''TI_CNTA_MNAC, ''NU_CNTA_MNAC, ''TI_CNTA_MEXT, ''NU_CNTA_MEXT                    
From  [TMCLIE] T1,                                   
      [OFIVENT].[DBO].[TTTIPO_CLIE] T2                                  
WHERE T1.CO_TIPO_CLIE = T2.CO_TIPO_CLIE                                  
AND NOT EXISTS (SELECT T3.CO_CLIE                                  
  FROM [OFIVENT].[DBO].[TDDIRE_CLIE] T3                                  
  WHERE T1.CO_EMPR = T3.CO_EMPR                                  
  AND T1.CO_CLIE = T3.CO_CLIE                                  
  AND T3.TI_DIRE = 'COM')                                  
Union All                                 
*/                    
                  
                  
Select                                   
T1.CO_EMPR , 'P' , T1.CO_PROV , T1.NO_PROV NO_AUXI,                                   
T3.DE_DIRE , Case Len(RTrim(LTrim(IsNull(T1.NU_RUCS,'')))) When 0 Then T1.CO_PROV Else T1.NU_RUCS End, '' , '' , T2.CO_TIPO_PROV , T2.DE_TIPO_PROV ,                                  
'' , '' , '' ,                                   
0 , 0 , '' , T1.ST_RETE , T1.ST_BCON , '' ST_SUJE_DETR ,                                  
T1.CO_DOCU_SUNA, T1.NU_DOCU_SUNA, T1.TI_PERS_SUNA, T1.NU_RETE_SUNA,                                  
T1.AP_PATE_PROV AP_PATE_AUXI, T1.AP_MATE_PROV AP_MATE_AUXI, T1.NO_PROV_NATU NO_NATU_AUX1,                                    
T1.NO_PROV_0002 NO_NATU_AUX2, T1.NO_RAZO_SOCI NO_RAZO_SOCI,                                
'', '' CO_SUBR,  '' TI_DOCU_IDEN , '' NU_DOCU_IDEN, TI_SITU, T1.ST_PERC, T1.NU_CNTA_DETR  ,                      
'' CO_GRUP_ECON, '' 'ST_PROV_NOHA', T1.TI_CNTA_MNAC, T1.NU_CNTA_MNAC, T1.TI_CNTA_MEXT, T1.NU_CNTA_MEXT , '' TI_NATU_JURI                   
From  OFITESO.DBO.[TMPROV_TESO] T1        
LEFT OUTER JOIN OFITESO.DBO.[TTTIPO_PROV] T2         
ON T1.CO_TIPO_PROV = T2.CO_TIPO_PROV                
LEFT OUTER JOIN OFITESO.DBO.[TDDIRE_PROV] T3                                  
ON T1.CO_EMPR = T3.CO_EMPR                                  
AND T1.CO_PROV = T3.CO_PROV                          
AND T3.TI_DIRE = 'COM'                                  
Union All                     


Select                                   
CO_EMPR, 'P', 'T' + '00'+ CO_EMPL, NO_APEL_PATE+ ' '+NO_APEL_MATE+' '+NO_EMPL,                                   
NULL, NULL , NULL, NULL, NULL, NULL,                                
NULL, NULL, NULL,                                   
NULL, NULL, '', '', '', '', '','','','', '', '', '', '', '',                                
'', '' CO_SUBR      ,  '' TI_DOCU_IDEN , '' NU_DOCU_IDEN, TI_SITU TI_SITU, '' ST_PERC, ''  , '' CO_GRUP_ECON, '' ST_PROV_NOHA,            
''TI_CNTA_MNAC, ''NU_CNTA_MNAC, ''TI_CNTA_MEXT, ''NU_CNTA_MEXT, '' TI_NATU_JURI                            
From OFITESO.DBO.TMEMPL_TESO                       
Union  ALL       
                  
/*                               
Select                          
T1.CO_EMPR , 'P' , T1.CO_PROV , T1.NO_CORT_PROV NO_AUXI,                                   
'' , Case Len(RTrim(LTrim(IsNull(T1.NU_RUCS_PROV,'')))) When 0 Then T1.CO_PROV Else T1.NU_RUCS_PROV End, '' , '' , T2.CO_TIPO_PROV , T2.DE_TIPO_PROV ,                                  
'' , '' , '' ,                                   
0 , 0 , '' , T1.ST_RETE , T1.ST_BCON , '' ST_SUJE_DETR ,                                  
T1.CO_DOCU_SUNA, T1.NU_DOCU_SUNA, T1.TI_PERS_SUNA, T1.NU_RETE_SUNA,                                  
T1.AP_PATE_PROV AP_PATE_AUXI, T1.AP_MATE_PROV AP_MATE_AUXI, T1.NO_PROV_NATU NO_NATU_AUX1,                                    
T1.NO_PROV_0002 NO_NATU_AUX2, T1.DE_RAZO_SOCI NO_RAZO_SOCI,                                  
'', '' CO_SUBR, '' TI_DOCU_IDEN , '' NU_DOCU_IDEN, TI_SITU, T1.ST_PERC, T1.NU_CNTA_DETR  ,                      
'' CO_GRUP_ECON, T1.ST_PROV_NOHA, T1.TI_CNTA_MNAC, T1.NU_CNTA_MNAC, T1.TI_CNTA_MEXT, T1.NU_CNTA_MEXT                    
From  [TMPROV] T1,                                   
      [OFITESO].[DBO].[TTTIPO_PROV] T2                    
WHERE T1.TI_PROV = T2.CO_TIPO_PROV                          
AND NOT EXISTS (SELECT T3.CO_PROV                            
                FROM [OFITESO].[DBO].[TDDIRE_PROV] T3                                  
                WHERE T1.CO_EMPR = T3.CO_EMPR                                  
                AND T1.CO_PROV = T3.CO_PROV                                  
                AND T3.TI_DIRE = 'COM')                                  
Union All                      
*/                              
                    
Select                                   
CO_EMPR, 'T', CO_EMPL, NO_APEL_PATE+ ' '+NO_APEL_MATE+' '+NO_EMPL,                                   
NULL, NULL , NULL, NULL, NULL, NULL,                                
NULL, NULL, NULL,                                   
NULL, NULL, '', '', '', '', '','','','', '', '', '', '', '',                                
'', '' CO_SUBR      ,  '' TI_DOCU_IDEN , '' NU_DOCU_IDEN, TI_SITU TI_SITU, '' ST_PERC, ''  , '' CO_GRUP_ECON, '' ST_PROV_NOHA,            
''TI_CNTA_MNAC, ''NU_CNTA_MNAC, ''TI_CNTA_MEXT, ''NU_CNTA_MEXT, '' TI_NATU_JURI                            
From OFITESO.DBO.TMEMPL_TESO                       
Union  ALL                       
                             
                     
Select                                  
CO_EMPR , TI_AUXI_EMPR , CO_AUXI_EMPR, NO_AUXI,                                   
NO_DIRE , NU_RUCS, NU_TLFN, NU_FAXE, ''TI_CLIE, ''DE_TIPO_CLIE,                                  
''CO_UBIC_GEOG, ''CO_COND_PAGO, ''CO_MONE_CRED,                                   
0 IM_LIMI_CRED, 0 IM_CRED_EXED, ''DE_OBSE, ''ST_RETE, ''ST_BCON, ''ST_SUJE_DETR,                    
''CO_DOCU_SUNA,''NU_DOCU_SUNA,''TI_PERS_SUNA,''NU_RETE_SUNA,                     
''AP_PATE_AUXI, ''AP_MATE_AUXI, ''NO_NATU_AUX1, ''NO_NATU_AUX2, ''NO_RAZO_SOCI,                                
''CO_ZONA, '' CO_SUBR     ,  '' TI_DOCU_IDEN , '' NU_DOCU_IDEN, TI_SITU,                       
'' ST_PERC, '' NU_CNTA_DETR , '' CO_GRUP_ECON, '' ST_PROV_NOHA, ''TI_CNTA_MNAC, ''NU_CNTA_MNAC, ''TI_CNTA_MEXT, ''NU_CNTA_MEXT, '' TI_NATU_JURI                    
From [OFISEGU].[DBO].[TMAUXI]                                  
WHERE  TI_AUXI_EMPR != 'C' and TI_AUXI_EMPR != 'P'                                 
AND TI_SITU = 'ACT'                   
                  
/*                   
Union  ALL                    
Select  t2.CO_EMPR, 'E', t2.CO_TRAB, t1.NO_APEL_PATE + ' ' + t1.NO_APEL_MATE + ' ' + t1.NO_TRAB,                             
'', '', '', '', '', '',                       
'', '', '',                                   
0, 0, '', '', '', '','','','','', '', '', '', '', '',                                
'', '' CO_SUBR     ,  '' TI_DOCU_IDEN , '' NU_DOCU_IDEN, T2.TI_SITU,   '' ST_PERC, ''  , '' CO_GRUP_ECON ,                  
'', '', '', '', ''                       
        From    OFIPLAN..TMTRAB_PERS t1, OFIPLAN..TMTRAB_EMPR t2                            
        Where  t1.CO_TRAB = t2.CO_TRAB                            
       And t2.TI_SITU = 'ACT'                   
                  
*/                  
                
              
            
          
        
      
    
  



GO
